﻿'Invoker
Public Class Jugador
    Public Ordenes As New List(Of IUnidadOrden)
    Public Unidad As New Unidad("Soldado")

    Public Sub EnviarOrden(orden As IUnidadOrden)
        Ordenes.Add(orden)
        orden.Execute()
    End Sub

End Class
